﻿Public Class login1
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

    Protected Sub btn_registrar_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btn_registrar.Click
        Dim usuario As String = tb_usuario.Text
        Dim contraseña As String = tb_contrasena.Text
        Login.validarusuario(usuario, contraseña)
    End Sub
End Class